3.24.65 \(\int \frac {(A+B x) (d+e x)^2}{a+b x+c x^2} \, dx\) [2365]

3.24.65.1 Optimal result
3.24.65.2 Mathematica [A] (verified)
3.24.65.3 Rubi [A] (verified)
3.24.65.4 Maple [A] (verified)
3.24.65.5 Fricas [A] (verification not implemented)
3.24.65.6 Sympy [B] (verification not implemented)
3.24.65.7 Maxima [F(-2)]
3.24.65.8 Giac [A] (verification not implemented)
3.24.65.9 Mupad [B] (verification not implemented)

3.24.65.1 Optimal result

Integrand size = 25, antiderivative size = 205 \[ \int \frac {(A+B x) (d+e x)^2}{a+b x+c x^2} \, dx=\frac {e (2 B c d-b B e+A c e) x}{c^2}+\frac {B e^2 x^2}{2 c}+\frac {\left (b^3 B e^2-b^2 c e (2 B d+A e)-2 c^2 \left (A c d^2-2 a B d e-a A e^2\right )+b c \left (B c d^2+2 A c d e-3 a B e^2\right )\right ) \text {arctanh}\left (\frac {b+2 c x}{\sqrt {b^2-4 a c}}\right )}{c^3 \sqrt {b^2-4 a c}}+\frac {\left (A c e (2 c d-b e)+B \left (c^2 d^2+b^2 e^2-c e (2 b d+a e)\right )\right ) \log \left (a+b x+c x^2\right )}{2 c^3} \]

output
e*(A*c*e-B*b*e+2*B*c*d)*x/c^2+1/2*B*e^2*x^2/c+1/2*(A*c*e*(-b*e+2*c*d)+B*(c 
^2*d^2+b^2*e^2-c*e*(a*e+2*b*d)))*ln(c*x^2+b*x+a)/c^3+(b^3*B*e^2-b^2*c*e*(A 
*e+2*B*d)-2*c^2*(-A*a*e^2+A*c*d^2-2*B*a*d*e)+b*c*(2*A*c*d*e-3*B*a*e^2+B*c* 
d^2))*arctanh((2*c*x+b)/(-4*a*c+b^2)^(1/2))/c^3/(-4*a*c+b^2)^(1/2)
 
3.24.65.2 Mathematica [A] (verified)

Time = 0.10 (sec) , antiderivative size = 203, normalized size of antiderivative = 0.99 \[ \int \frac {(A+B x) (d+e x)^2}{a+b x+c x^2} \, dx=\frac {2 c e (2 B c d-b B e+A c e) x+B c^2 e^2 x^2-\frac {2 \left (b^3 B e^2-b^2 c e (2 B d+A e)+2 c^2 \left (-A c d^2+2 a B d e+a A e^2\right )+b c \left (B c d^2+2 A c d e-3 a B e^2\right )\right ) \arctan \left (\frac {b+2 c x}{\sqrt {-b^2+4 a c}}\right )}{\sqrt {-b^2+4 a c}}+\left (A c e (2 c d-b e)+B \left (c^2 d^2+b^2 e^2-c e (2 b d+a e)\right )\right ) \log (a+x (b+c x))}{2 c^3} \]

input
Integrate[((A + B*x)*(d + e*x)^2)/(a + b*x + c*x^2),x]
 
output
(2*c*e*(2*B*c*d - b*B*e + A*c*e)*x + B*c^2*e^2*x^2 - (2*(b^3*B*e^2 - b^2*c 
*e*(2*B*d + A*e) + 2*c^2*(-(A*c*d^2) + 2*a*B*d*e + a*A*e^2) + b*c*(B*c*d^2 
 + 2*A*c*d*e - 3*a*B*e^2))*ArcTan[(b + 2*c*x)/Sqrt[-b^2 + 4*a*c]])/Sqrt[-b 
^2 + 4*a*c] + (A*c*e*(2*c*d - b*e) + B*(c^2*d^2 + b^2*e^2 - c*e*(2*b*d + a 
*e)))*Log[a + x*(b + c*x)])/(2*c^3)
 
3.24.65.3 Rubi [A] (verified)

Time = 0.50 (sec) , antiderivative size = 205, normalized size of antiderivative = 1.00, number of steps used = 2, number of rules used = 2, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.080, Rules used = {1200, 2009}

Below are the steps used by Rubi to obtain the solution. The rule number used for the transformation is given above next to the arrow. The rules definitions used are listed below.

\(\displaystyle \int \frac {(A+B x) (d+e x)^2}{a+b x+c x^2} \, dx\)

\(\Big \downarrow \) 1200

\(\displaystyle \int \left (\frac {x \left (B \left (-c e (a e+2 b d)+b^2 e^2+c^2 d^2\right )+A c e (2 c d-b e)\right )+A c \left (c d^2-a e^2\right )-a B e (2 c d-b e)}{c^2 \left (a+b x+c x^2\right )}+\frac {e (A c e-b B e+2 B c d)}{c^2}+\frac {B e^2 x}{c}\right )dx\)

\(\Big \downarrow \) 2009

\(\displaystyle \frac {\text {arctanh}\left (\frac {b+2 c x}{\sqrt {b^2-4 a c}}\right ) \left (b c \left (-3 a B e^2+2 A c d e+B c d^2\right )-2 c^2 \left (-a A e^2-2 a B d e+A c d^2\right )-b^2 c e (A e+2 B d)+b^3 B e^2\right )}{c^3 \sqrt {b^2-4 a c}}+\frac {\log \left (a+b x+c x^2\right ) \left (B \left (-c e (a e+2 b d)+b^2 e^2+c^2 d^2\right )+A c e (2 c d-b e)\right )}{2 c^3}+\frac {e x (A c e-b B e+2 B c d)}{c^2}+\frac {B e^2 x^2}{2 c}\)

input
Int[((A + B*x)*(d + e*x)^2)/(a + b*x + c*x^2),x]
 
output
(e*(2*B*c*d - b*B*e + A*c*e)*x)/c^2 + (B*e^2*x^2)/(2*c) + ((b^3*B*e^2 - b^ 
2*c*e*(2*B*d + A*e) - 2*c^2*(A*c*d^2 - 2*a*B*d*e - a*A*e^2) + b*c*(B*c*d^2 
 + 2*A*c*d*e - 3*a*B*e^2))*ArcTanh[(b + 2*c*x)/Sqrt[b^2 - 4*a*c]])/(c^3*Sq 
rt[b^2 - 4*a*c]) + ((A*c*e*(2*c*d - b*e) + B*(c^2*d^2 + b^2*e^2 - c*e*(2*b 
*d + a*e)))*Log[a + b*x + c*x^2])/(2*c^3)
 

3.24.65.3.1 Defintions of rubi rules used

rule 1200
Int[(((d_.) + (e_.)*(x_))^(m_.)*((f_.) + (g_.)*(x_))^(n_.))/((a_.) + (b_.)* 
(x_) + (c_.)*(x_)^2), x_Symbol] :> Int[ExpandIntegrand[(d + e*x)^m*((f + g* 
x)^n/(a + b*x + c*x^2)), x], x] /; FreeQ[{a, b, c, d, e, f, g, m}, x] && In 
tegersQ[n]
 

rule 2009
Int[u_, x_Symbol] :> Simp[IntSum[u, x], x] /; SumQ[u]
 
3.24.65.4 Maple [A] (verified)

Time = 0.50 (sec) , antiderivative size = 221, normalized size of antiderivative = 1.08

method result size
default \(\frac {e \left (\frac {1}{2} B c e \,x^{2}+A c e x -B b e x +2 B c d x \right )}{c^{2}}+\frac {\frac {\left (-A b c \,e^{2}+2 A \,c^{2} d e -B \,e^{2} a c +B \,b^{2} e^{2}-2 B b c d e +B \,c^{2} d^{2}\right ) \ln \left (c \,x^{2}+b x +a \right )}{2 c}+\frac {2 \left (-A a c \,e^{2}+A \,c^{2} d^{2}+B a b \,e^{2}-2 B a c d e -\frac {\left (-A b c \,e^{2}+2 A \,c^{2} d e -B \,e^{2} a c +B \,b^{2} e^{2}-2 B b c d e +B \,c^{2} d^{2}\right ) b}{2 c}\right ) \arctan \left (\frac {2 c x +b}{\sqrt {4 a c -b^{2}}}\right )}{\sqrt {4 a c -b^{2}}}}{c^{2}}\) \(221\)
risch \(\text {Expression too large to display}\) \(9663\)

input
int((B*x+A)*(e*x+d)^2/(c*x^2+b*x+a),x,method=_RETURNVERBOSE)
 
output
e/c^2*(1/2*B*c*e*x^2+A*c*e*x-B*b*e*x+2*B*c*d*x)+1/c^2*(1/2*(-A*b*c*e^2+2*A 
*c^2*d*e-B*a*c*e^2+B*b^2*e^2-2*B*b*c*d*e+B*c^2*d^2)/c*ln(c*x^2+b*x+a)+2*(- 
A*a*c*e^2+A*c^2*d^2+B*a*b*e^2-2*B*a*c*d*e-1/2*(-A*b*c*e^2+2*A*c^2*d*e-B*a* 
c*e^2+B*b^2*e^2-2*B*b*c*d*e+B*c^2*d^2)*b/c)/(4*a*c-b^2)^(1/2)*arctan((2*c* 
x+b)/(4*a*c-b^2)^(1/2)))
 
3.24.65.5 Fricas [A] (verification not implemented)

Time = 0.32 (sec) , antiderivative size = 673, normalized size of antiderivative = 3.28 \[ \int \frac {(A+B x) (d+e x)^2}{a+b x+c x^2} \, dx=\left [\frac {{\left (B b^{2} c^{2} - 4 \, B a c^{3}\right )} e^{2} x^{2} + {\left ({\left (B b c^{2} - 2 \, A c^{3}\right )} d^{2} - 2 \, {\left (B b^{2} c - {\left (2 \, B a + A b\right )} c^{2}\right )} d e + {\left (B b^{3} + 2 \, A a c^{2} - {\left (3 \, B a b + A b^{2}\right )} c\right )} e^{2}\right )} \sqrt {b^{2} - 4 \, a c} \log \left (\frac {2 \, c^{2} x^{2} + 2 \, b c x + b^{2} - 2 \, a c + \sqrt {b^{2} - 4 \, a c} {\left (2 \, c x + b\right )}}{c x^{2} + b x + a}\right ) + 2 \, {\left (2 \, {\left (B b^{2} c^{2} - 4 \, B a c^{3}\right )} d e - {\left (B b^{3} c + 4 \, A a c^{3} - {\left (4 \, B a b + A b^{2}\right )} c^{2}\right )} e^{2}\right )} x + {\left ({\left (B b^{2} c^{2} - 4 \, B a c^{3}\right )} d^{2} - 2 \, {\left (B b^{3} c + 4 \, A a c^{3} - {\left (4 \, B a b + A b^{2}\right )} c^{2}\right )} d e + {\left (B b^{4} + 4 \, {\left (B a^{2} + A a b\right )} c^{2} - {\left (5 \, B a b^{2} + A b^{3}\right )} c\right )} e^{2}\right )} \log \left (c x^{2} + b x + a\right )}{2 \, {\left (b^{2} c^{3} - 4 \, a c^{4}\right )}}, \frac {{\left (B b^{2} c^{2} - 4 \, B a c^{3}\right )} e^{2} x^{2} + 2 \, {\left ({\left (B b c^{2} - 2 \, A c^{3}\right )} d^{2} - 2 \, {\left (B b^{2} c - {\left (2 \, B a + A b\right )} c^{2}\right )} d e + {\left (B b^{3} + 2 \, A a c^{2} - {\left (3 \, B a b + A b^{2}\right )} c\right )} e^{2}\right )} \sqrt {-b^{2} + 4 \, a c} \arctan \left (-\frac {\sqrt {-b^{2} + 4 \, a c} {\left (2 \, c x + b\right )}}{b^{2} - 4 \, a c}\right ) + 2 \, {\left (2 \, {\left (B b^{2} c^{2} - 4 \, B a c^{3}\right )} d e - {\left (B b^{3} c + 4 \, A a c^{3} - {\left (4 \, B a b + A b^{2}\right )} c^{2}\right )} e^{2}\right )} x + {\left ({\left (B b^{2} c^{2} - 4 \, B a c^{3}\right )} d^{2} - 2 \, {\left (B b^{3} c + 4 \, A a c^{3} - {\left (4 \, B a b + A b^{2}\right )} c^{2}\right )} d e + {\left (B b^{4} + 4 \, {\left (B a^{2} + A a b\right )} c^{2} - {\left (5 \, B a b^{2} + A b^{3}\right )} c\right )} e^{2}\right )} \log \left (c x^{2} + b x + a\right )}{2 \, {\left (b^{2} c^{3} - 4 \, a c^{4}\right )}}\right ] \]

input
integrate((B*x+A)*(e*x+d)^2/(c*x^2+b*x+a),x, algorithm="fricas")
 
output
[1/2*((B*b^2*c^2 - 4*B*a*c^3)*e^2*x^2 + ((B*b*c^2 - 2*A*c^3)*d^2 - 2*(B*b^ 
2*c - (2*B*a + A*b)*c^2)*d*e + (B*b^3 + 2*A*a*c^2 - (3*B*a*b + A*b^2)*c)*e 
^2)*sqrt(b^2 - 4*a*c)*log((2*c^2*x^2 + 2*b*c*x + b^2 - 2*a*c + sqrt(b^2 - 
4*a*c)*(2*c*x + b))/(c*x^2 + b*x + a)) + 2*(2*(B*b^2*c^2 - 4*B*a*c^3)*d*e 
- (B*b^3*c + 4*A*a*c^3 - (4*B*a*b + A*b^2)*c^2)*e^2)*x + ((B*b^2*c^2 - 4*B 
*a*c^3)*d^2 - 2*(B*b^3*c + 4*A*a*c^3 - (4*B*a*b + A*b^2)*c^2)*d*e + (B*b^4 
 + 4*(B*a^2 + A*a*b)*c^2 - (5*B*a*b^2 + A*b^3)*c)*e^2)*log(c*x^2 + b*x + a 
))/(b^2*c^3 - 4*a*c^4), 1/2*((B*b^2*c^2 - 4*B*a*c^3)*e^2*x^2 + 2*((B*b*c^2 
 - 2*A*c^3)*d^2 - 2*(B*b^2*c - (2*B*a + A*b)*c^2)*d*e + (B*b^3 + 2*A*a*c^2 
 - (3*B*a*b + A*b^2)*c)*e^2)*sqrt(-b^2 + 4*a*c)*arctan(-sqrt(-b^2 + 4*a*c) 
*(2*c*x + b)/(b^2 - 4*a*c)) + 2*(2*(B*b^2*c^2 - 4*B*a*c^3)*d*e - (B*b^3*c 
+ 4*A*a*c^3 - (4*B*a*b + A*b^2)*c^2)*e^2)*x + ((B*b^2*c^2 - 4*B*a*c^3)*d^2 
 - 2*(B*b^3*c + 4*A*a*c^3 - (4*B*a*b + A*b^2)*c^2)*d*e + (B*b^4 + 4*(B*a^2 
 + A*a*b)*c^2 - (5*B*a*b^2 + A*b^3)*c)*e^2)*log(c*x^2 + b*x + a))/(b^2*c^3 
 - 4*a*c^4)]
 
3.24.65.6 Sympy [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 1532 vs. \(2 (207) = 414\).

Time = 5.61 (sec) , antiderivative size = 1532, normalized size of antiderivative = 7.47 \[ \int \frac {(A+B x) (d+e x)^2}{a+b x+c x^2} \, dx=\frac {B e^{2} x^{2}}{2 c} + x \left (\frac {A e^{2}}{c} - \frac {B b e^{2}}{c^{2}} + \frac {2 B d e}{c}\right ) + \left (- \frac {\sqrt {- 4 a c + b^{2}} \left (- 2 A a c^{2} e^{2} + A b^{2} c e^{2} - 2 A b c^{2} d e + 2 A c^{3} d^{2} + 3 B a b c e^{2} - 4 B a c^{2} d e - B b^{3} e^{2} + 2 B b^{2} c d e - B b c^{2} d^{2}\right )}{2 c^{3} \cdot \left (4 a c - b^{2}\right )} - \frac {A b c e^{2} - 2 A c^{2} d e + B a c e^{2} - B b^{2} e^{2} + 2 B b c d e - B c^{2} d^{2}}{2 c^{3}}\right ) \log {\left (x + \frac {A a b c e^{2} - 4 A a c^{2} d e + A b c^{2} d^{2} + 2 B a^{2} c e^{2} - B a b^{2} e^{2} + 2 B a b c d e - 2 B a c^{2} d^{2} + 4 a c^{3} \left (- \frac {\sqrt {- 4 a c + b^{2}} \left (- 2 A a c^{2} e^{2} + A b^{2} c e^{2} - 2 A b c^{2} d e + 2 A c^{3} d^{2} + 3 B a b c e^{2} - 4 B a c^{2} d e - B b^{3} e^{2} + 2 B b^{2} c d e - B b c^{2} d^{2}\right )}{2 c^{3} \cdot \left (4 a c - b^{2}\right )} - \frac {A b c e^{2} - 2 A c^{2} d e + B a c e^{2} - B b^{2} e^{2} + 2 B b c d e - B c^{2} d^{2}}{2 c^{3}}\right ) - b^{2} c^{2} \left (- \frac {\sqrt {- 4 a c + b^{2}} \left (- 2 A a c^{2} e^{2} + A b^{2} c e^{2} - 2 A b c^{2} d e + 2 A c^{3} d^{2} + 3 B a b c e^{2} - 4 B a c^{2} d e - B b^{3} e^{2} + 2 B b^{2} c d e - B b c^{2} d^{2}\right )}{2 c^{3} \cdot \left (4 a c - b^{2}\right )} - \frac {A b c e^{2} - 2 A c^{2} d e + B a c e^{2} - B b^{2} e^{2} + 2 B b c d e - B c^{2} d^{2}}{2 c^{3}}\right )}{- 2 A a c^{2} e^{2} + A b^{2} c e^{2} - 2 A b c^{2} d e + 2 A c^{3} d^{2} + 3 B a b c e^{2} - 4 B a c^{2} d e - B b^{3} e^{2} + 2 B b^{2} c d e - B b c^{2} d^{2}} \right )} + \left (\frac {\sqrt {- 4 a c + b^{2}} \left (- 2 A a c^{2} e^{2} + A b^{2} c e^{2} - 2 A b c^{2} d e + 2 A c^{3} d^{2} + 3 B a b c e^{2} - 4 B a c^{2} d e - B b^{3} e^{2} + 2 B b^{2} c d e - B b c^{2} d^{2}\right )}{2 c^{3} \cdot \left (4 a c - b^{2}\right )} - \frac {A b c e^{2} - 2 A c^{2} d e + B a c e^{2} - B b^{2} e^{2} + 2 B b c d e - B c^{2} d^{2}}{2 c^{3}}\right ) \log {\left (x + \frac {A a b c e^{2} - 4 A a c^{2} d e + A b c^{2} d^{2} + 2 B a^{2} c e^{2} - B a b^{2} e^{2} + 2 B a b c d e - 2 B a c^{2} d^{2} + 4 a c^{3} \left (\frac {\sqrt {- 4 a c + b^{2}} \left (- 2 A a c^{2} e^{2} + A b^{2} c e^{2} - 2 A b c^{2} d e + 2 A c^{3} d^{2} + 3 B a b c e^{2} - 4 B a c^{2} d e - B b^{3} e^{2} + 2 B b^{2} c d e - B b c^{2} d^{2}\right )}{2 c^{3} \cdot \left (4 a c - b^{2}\right )} - \frac {A b c e^{2} - 2 A c^{2} d e + B a c e^{2} - B b^{2} e^{2} + 2 B b c d e - B c^{2} d^{2}}{2 c^{3}}\right ) - b^{2} c^{2} \left (\frac {\sqrt {- 4 a c + b^{2}} \left (- 2 A a c^{2} e^{2} + A b^{2} c e^{2} - 2 A b c^{2} d e + 2 A c^{3} d^{2} + 3 B a b c e^{2} - 4 B a c^{2} d e - B b^{3} e^{2} + 2 B b^{2} c d e - B b c^{2} d^{2}\right )}{2 c^{3} \cdot \left (4 a c - b^{2}\right )} - \frac {A b c e^{2} - 2 A c^{2} d e + B a c e^{2} - B b^{2} e^{2} + 2 B b c d e - B c^{2} d^{2}}{2 c^{3}}\right )}{- 2 A a c^{2} e^{2} + A b^{2} c e^{2} - 2 A b c^{2} d e + 2 A c^{3} d^{2} + 3 B a b c e^{2} - 4 B a c^{2} d e - B b^{3} e^{2} + 2 B b^{2} c d e - B b c^{2} d^{2}} \right )} \]

input
integrate((B*x+A)*(e*x+d)**2/(c*x**2+b*x+a),x)
 
output
B*e**2*x**2/(2*c) + x*(A*e**2/c - B*b*e**2/c**2 + 2*B*d*e/c) + (-sqrt(-4*a 
*c + b**2)*(-2*A*a*c**2*e**2 + A*b**2*c*e**2 - 2*A*b*c**2*d*e + 2*A*c**3*d 
**2 + 3*B*a*b*c*e**2 - 4*B*a*c**2*d*e - B*b**3*e**2 + 2*B*b**2*c*d*e - B*b 
*c**2*d**2)/(2*c**3*(4*a*c - b**2)) - (A*b*c*e**2 - 2*A*c**2*d*e + B*a*c*e 
**2 - B*b**2*e**2 + 2*B*b*c*d*e - B*c**2*d**2)/(2*c**3))*log(x + (A*a*b*c* 
e**2 - 4*A*a*c**2*d*e + A*b*c**2*d**2 + 2*B*a**2*c*e**2 - B*a*b**2*e**2 + 
2*B*a*b*c*d*e - 2*B*a*c**2*d**2 + 4*a*c**3*(-sqrt(-4*a*c + b**2)*(-2*A*a*c 
**2*e**2 + A*b**2*c*e**2 - 2*A*b*c**2*d*e + 2*A*c**3*d**2 + 3*B*a*b*c*e**2 
 - 4*B*a*c**2*d*e - B*b**3*e**2 + 2*B*b**2*c*d*e - B*b*c**2*d**2)/(2*c**3* 
(4*a*c - b**2)) - (A*b*c*e**2 - 2*A*c**2*d*e + B*a*c*e**2 - B*b**2*e**2 + 
2*B*b*c*d*e - B*c**2*d**2)/(2*c**3)) - b**2*c**2*(-sqrt(-4*a*c + b**2)*(-2 
*A*a*c**2*e**2 + A*b**2*c*e**2 - 2*A*b*c**2*d*e + 2*A*c**3*d**2 + 3*B*a*b* 
c*e**2 - 4*B*a*c**2*d*e - B*b**3*e**2 + 2*B*b**2*c*d*e - B*b*c**2*d**2)/(2 
*c**3*(4*a*c - b**2)) - (A*b*c*e**2 - 2*A*c**2*d*e + B*a*c*e**2 - B*b**2*e 
**2 + 2*B*b*c*d*e - B*c**2*d**2)/(2*c**3)))/(-2*A*a*c**2*e**2 + A*b**2*c*e 
**2 - 2*A*b*c**2*d*e + 2*A*c**3*d**2 + 3*B*a*b*c*e**2 - 4*B*a*c**2*d*e - B 
*b**3*e**2 + 2*B*b**2*c*d*e - B*b*c**2*d**2)) + (sqrt(-4*a*c + b**2)*(-2*A 
*a*c**2*e**2 + A*b**2*c*e**2 - 2*A*b*c**2*d*e + 2*A*c**3*d**2 + 3*B*a*b*c* 
e**2 - 4*B*a*c**2*d*e - B*b**3*e**2 + 2*B*b**2*c*d*e - B*b*c**2*d**2)/(2*c 
**3*(4*a*c - b**2)) - (A*b*c*e**2 - 2*A*c**2*d*e + B*a*c*e**2 - B*b**2*...
 
3.24.65.7 Maxima [F(-2)]

Exception generated. \[ \int \frac {(A+B x) (d+e x)^2}{a+b x+c x^2} \, dx=\text {Exception raised: ValueError} \]

input
integrate((B*x+A)*(e*x+d)^2/(c*x^2+b*x+a),x, algorithm="maxima")
 
output
Exception raised: ValueError >> Computation failed since Maxima requested 
additional constraints; using the 'assume' command before evaluation *may* 
 help (example of legal syntax is 'assume(4*a*c-b^2>0)', see `assume?` for 
 more deta
 
3.24.65.8 Giac [A] (verification not implemented)

Time = 0.27 (sec) , antiderivative size = 223, normalized size of antiderivative = 1.09 \[ \int \frac {(A+B x) (d+e x)^2}{a+b x+c x^2} \, dx=\frac {B c e^{2} x^{2} + 4 \, B c d e x - 2 \, B b e^{2} x + 2 \, A c e^{2} x}{2 \, c^{2}} + \frac {{\left (B c^{2} d^{2} - 2 \, B b c d e + 2 \, A c^{2} d e + B b^{2} e^{2} - B a c e^{2} - A b c e^{2}\right )} \log \left (c x^{2} + b x + a\right )}{2 \, c^{3}} - \frac {{\left (B b c^{2} d^{2} - 2 \, A c^{3} d^{2} - 2 \, B b^{2} c d e + 4 \, B a c^{2} d e + 2 \, A b c^{2} d e + B b^{3} e^{2} - 3 \, B a b c e^{2} - A b^{2} c e^{2} + 2 \, A a c^{2} e^{2}\right )} \arctan \left (\frac {2 \, c x + b}{\sqrt {-b^{2} + 4 \, a c}}\right )}{\sqrt {-b^{2} + 4 \, a c} c^{3}} \]

input
integrate((B*x+A)*(e*x+d)^2/(c*x^2+b*x+a),x, algorithm="giac")
 
output
1/2*(B*c*e^2*x^2 + 4*B*c*d*e*x - 2*B*b*e^2*x + 2*A*c*e^2*x)/c^2 + 1/2*(B*c 
^2*d^2 - 2*B*b*c*d*e + 2*A*c^2*d*e + B*b^2*e^2 - B*a*c*e^2 - A*b*c*e^2)*lo 
g(c*x^2 + b*x + a)/c^3 - (B*b*c^2*d^2 - 2*A*c^3*d^2 - 2*B*b^2*c*d*e + 4*B* 
a*c^2*d*e + 2*A*b*c^2*d*e + B*b^3*e^2 - 3*B*a*b*c*e^2 - A*b^2*c*e^2 + 2*A* 
a*c^2*e^2)*arctan((2*c*x + b)/sqrt(-b^2 + 4*a*c))/(sqrt(-b^2 + 4*a*c)*c^3)
 
3.24.65.9 Mupad [B] (verification not implemented)

Time = 11.77 (sec) , antiderivative size = 316, normalized size of antiderivative = 1.54 \[ \int \frac {(A+B x) (d+e x)^2}{a+b x+c x^2} \, dx=x\,\left (\frac {A\,e^2+2\,B\,d\,e}{c}-\frac {B\,b\,e^2}{c^2}\right )-\frac {\ln \left (c\,x^2+b\,x+a\right )\,\left (4\,B\,a^2\,c^2\,e^2-5\,B\,a\,b^2\,c\,e^2+8\,B\,a\,b\,c^2\,d\,e+4\,A\,a\,b\,c^2\,e^2-4\,B\,a\,c^3\,d^2-8\,A\,a\,c^3\,d\,e+B\,b^4\,e^2-2\,B\,b^3\,c\,d\,e-A\,b^3\,c\,e^2+B\,b^2\,c^2\,d^2+2\,A\,b^2\,c^2\,d\,e\right )}{2\,\left (4\,a\,c^4-b^2\,c^3\right )}-\frac {\mathrm {atan}\left (\frac {b}{\sqrt {4\,a\,c-b^2}}+\frac {2\,c\,x}{\sqrt {4\,a\,c-b^2}}\right )\,\left (B\,b^3\,e^2-2\,B\,b^2\,c\,d\,e-A\,b^2\,c\,e^2+B\,b\,c^2\,d^2+2\,A\,b\,c^2\,d\,e-3\,B\,a\,b\,c\,e^2-2\,A\,c^3\,d^2+4\,B\,a\,c^2\,d\,e+2\,A\,a\,c^2\,e^2\right )}{c^3\,\sqrt {4\,a\,c-b^2}}+\frac {B\,e^2\,x^2}{2\,c} \]

input
int(((A + B*x)*(d + e*x)^2)/(a + b*x + c*x^2),x)
 
output
x*((A*e^2 + 2*B*d*e)/c - (B*b*e^2)/c^2) - (log(a + b*x + c*x^2)*(B*b^4*e^2 
 - 4*B*a*c^3*d^2 - A*b^3*c*e^2 + 4*B*a^2*c^2*e^2 + B*b^2*c^2*d^2 - 8*A*a*c 
^3*d*e - 2*B*b^3*c*d*e + 4*A*a*b*c^2*e^2 - 5*B*a*b^2*c*e^2 + 2*A*b^2*c^2*d 
*e + 8*B*a*b*c^2*d*e))/(2*(4*a*c^4 - b^2*c^3)) - (atan(b/(4*a*c - b^2)^(1/ 
2) + (2*c*x)/(4*a*c - b^2)^(1/2))*(B*b^3*e^2 - 2*A*c^3*d^2 + 2*A*a*c^2*e^2 
 - A*b^2*c*e^2 + B*b*c^2*d^2 - 3*B*a*b*c*e^2 + 2*A*b*c^2*d*e + 4*B*a*c^2*d 
*e - 2*B*b^2*c*d*e))/(c^3*(4*a*c - b^2)^(1/2)) + (B*e^2*x^2)/(2*c)